home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / News Stacks / Dec.'89AMUG News™.cpt / Dec.'89AMUG News™ / card_2934.txt < prev    next >
Text File  |  1990-01-21  |  12KB  |  611 lines
  1. -- card: 2934 from stack: in.'89AMUG News‚Ñ¢
  2. -- bmap block id: 3197
  3. -- flags: 0000
  4. -- background id: 2628
  5. -- name: Index
  6. ----- HyperTalk script -----
  7. on CloseCard
  8.   push card
  9. end CloseCard
  10.  
  11.  
  12.  
  13. -- part 9 (field)
  14. -- low flags: 00
  15. -- high flags: 0000
  16. -- rect: left=34 top=240 right=296 bottom=236
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 0
  20. -- font id: 2
  21. -- text size: 10
  22. -- style flags: 0
  23. -- line height: 13
  24. -- part name: 
  25.  
  26.  
  27. -- part 4 (field)
  28. -- low flags: 01
  29. -- high flags: 0000
  30. -- rect: left=34 top=193 right=224 bottom=192
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 2
  35. -- text size: 10
  36. -- style flags: 0
  37. -- line height: 13
  38. -- part name: 
  39.  
  40.  
  41. -- part 6 (field)
  42. -- low flags: 00
  43. -- high flags: 0000
  44. -- rect: left=187 top=192 right=209 bottom=209
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 0
  48. -- font id: 2
  49. -- text size: 12
  50. -- style flags: 256
  51. -- line height: 16
  52. -- part name: 
  53.  
  54.  
  55. -- part 7 (field)
  56. -- low flags: 00
  57. -- high flags: 0000
  58. -- rect: left=187 top=204 right=221 bottom=209
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 0
  62. -- font id: 2
  63. -- text size: 12
  64. -- style flags: 256
  65. -- line height: 16
  66. -- part name: 
  67.  
  68.  
  69. -- part 8 (field)
  70. -- low flags: 01
  71. -- high flags: 0000
  72. -- rect: left=34 top=223 right=240 bottom=132
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 0
  76. -- font id: 2
  77. -- text size: 12
  78. -- style flags: 1280
  79. -- line height: 16
  80. -- part name: 
  81.  
  82.  
  83. -- part 11 (field)
  84. -- low flags: 00
  85. -- high flags: 0000
  86. -- rect: left=231 top=238 right=255 bottom=255
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 0
  90. -- font id: 2
  91. -- text size: 12
  92. -- style flags: 256
  93. -- line height: 16
  94. -- part name: 
  95.  
  96.  
  97. -- part 12 (field)
  98. -- low flags: 00
  99. -- high flags: 0000
  100. -- rect: left=231 top=252 right=269 bottom=255
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 0 / 0
  103. -- text alignment: 0
  104. -- font id: 2
  105. -- text size: 12
  106. -- style flags: 256
  107. -- line height: 16
  108. -- part name: 
  109.  
  110.  
  111. -- part 13 (field)
  112. -- low flags: 00
  113. -- high flags: 0000
  114. -- rect: left=257 top=226 right=256 bottom=465
  115. -- title width / last selected line: 0
  116. -- icon id / first selected line: 0 / 0
  117. -- text alignment: 0
  118. -- font id: 2
  119. -- text size: 10
  120. -- style flags: 0
  121. -- line height: 13
  122. -- part name: 
  123.  
  124.  
  125. -- part 14 (field)
  126. -- low flags: 01
  127. -- high flags: 0000
  128. -- rect: left=316 top=194 right=211 bottom=414
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 0
  132. -- font id: 2
  133. -- text size: 12
  134. -- style flags: 1280
  135. -- line height: 16
  136. -- part name: 
  137.  
  138.  
  139. -- part 15 (field)
  140. -- low flags: 00
  141. -- high flags: 0000
  142. -- rect: left=461 top=209 right=226 bottom=483
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 0 / 0
  145. -- text alignment: 0
  146. -- font id: 2
  147. -- text size: 12
  148. -- style flags: 256
  149. -- line height: 16
  150. -- part name: 
  151.  
  152.  
  153. -- part 16 (field)
  154. -- low flags: 01
  155. -- high flags: 0000
  156. -- rect: left=232 top=265 right=282 bottom=254
  157. -- title width / last selected line: 0
  158. -- icon id / first selected line: 0 / 0
  159. -- text alignment: 0
  160. -- font id: 2
  161. -- text size: 12
  162. -- style flags: 256
  163. -- line height: 16
  164. -- part name: 
  165.  
  166.  
  167. -- part 17 (field)
  168. -- low flags: 00
  169. -- high flags: 0000
  170. -- rect: left=232 top=278 right=295 bottom=254
  171. -- title width / last selected line: 0
  172. -- icon id / first selected line: 0 / 0
  173. -- text alignment: 0
  174. -- font id: 2
  175. -- text size: 12
  176. -- style flags: 256
  177. -- line height: 16
  178. -- part name: 
  179.  
  180.  
  181. -- part 18 (button)
  182. -- low flags: 00
  183. -- high flags: 2000
  184. -- rect: left=31 top=192 right=206 bottom=204
  185. -- title width / last selected line: 0
  186. -- icon id / first selected line: 0 / 0
  187. -- text alignment: 1
  188. -- font id: 0
  189. -- text size: 12
  190. -- style flags: 0
  191. -- line height: 16
  192. -- part name: 
  193. ----- HyperTalk script -----
  194. on mouseUp
  195.   visual iris open very slowly
  196.   go to card "President"
  197.   Play "Welcome to AMUG"
  198.   dispPICT "Mike"
  199. end mouseUp
  200.  
  201.  
  202.  
  203. -- part 19 (button)
  204. -- low flags: 00
  205. -- high flags: 2000
  206. -- rect: left=314 top=310 right=330 bottom=344
  207. -- title width / last selected line: 0
  208. -- icon id / first selected line: 2749 / 2749
  209. -- text alignment: 1
  210. -- font id: 0
  211. -- text size: 12
  212. -- style flags: 0
  213. -- line height: 16
  214. -- part name: Forward
  215. ----- HyperTalk script -----
  216. on mouseUp
  217.   visual wipe left slowly
  218.   go to next card
  219. end mouseUp
  220.  
  221.  
  222.  
  223. -- part 21 (button)
  224. -- low flags: 00
  225. -- high flags: 2000
  226. -- rect: left=31 top=206 right=221 bottom=204
  227. -- title width / last selected line: 0
  228. -- icon id / first selected line: 0 / 0
  229. -- text alignment: 1
  230. -- font id: 0
  231. -- text size: 12
  232. -- style flags: 0
  233. -- line height: 16
  234. -- part name: 
  235. ----- HyperTalk script -----
  236. on mouseUp
  237.   visual iris open very slowly
  238.   go to card "Editor's Zone"
  239. end mouseUp
  240.  
  241.  
  242.  
  243. -- part 22 (button)
  244. -- low flags: 00
  245. -- high flags: 2000
  246. -- rect: left=31 top=254 right=268 bottom=259
  247. -- title width / last selected line: 0
  248. -- icon id / first selected line: 0 / 0
  249. -- text alignment: 1
  250. -- font id: 0
  251. -- text size: 12
  252. -- style flags: 0
  253. -- line height: 16
  254. -- part name: 
  255. ----- HyperTalk script -----
  256. on mouseUp
  257.   visual iris open very slowly
  258.   go to card "MacSprint"
  259. end mouseUp
  260.  
  261.  
  262.  
  263. -- part 25 (button)
  264. -- low flags: 00
  265. -- high flags: 2000
  266. -- rect: left=31 top=267 right=281 bottom=259
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 0 / 0
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: 
  275. ----- HyperTalk script -----
  276. on mouseUp
  277.   visual iris open very slowly
  278.   go to card "Diamond"
  279. end mouseUp
  280.  
  281.  
  282.  
  283. -- part 26 (button)
  284. -- low flags: 00
  285. -- high flags: 2000
  286. -- rect: left=31 top=239 right=254 bottom=259
  287. -- title width / last selected line: 0
  288. -- icon id / first selected line: 0 / 0
  289. -- text alignment: 1
  290. -- font id: 0
  291. -- text size: 12
  292. -- style flags: 0
  293. -- line height: 16
  294. -- part name: 
  295. ----- HyperTalk script -----
  296. on mouseUp
  297.   visual iris open very slowly
  298.   go to card 11
  299. end mouseUp
  300.  
  301.  
  302.  
  303. -- part 30 (field)
  304. -- low flags: 01
  305. -- high flags: 0000
  306. -- rect: left=257 top=212 right=230 bottom=462
  307. -- title width / last selected line: 0
  308. -- icon id / first selected line: 0 / 0
  309. -- text alignment: 0
  310. -- font id: 2
  311. -- text size: 10
  312. -- style flags: 0
  313. -- line height: 13
  314. -- part name: 
  315.  
  316.  
  317. -- part 23 (button)
  318. -- low flags: 00
  319. -- high flags: 2000
  320. -- rect: left=258 top=211 right=225 bottom=487
  321. -- title width / last selected line: 0
  322. -- icon id / first selected line: 0 / 0
  323. -- text alignment: 1
  324. -- font id: 0
  325. -- text size: 12
  326. -- style flags: 0
  327. -- line height: 16
  328. -- part name: 
  329. ----- HyperTalk script -----
  330. on mouseUp
  331.   visual iris open very slowly
  332.   go to card "AMUG Art"
  333. end mouseUp
  334.  
  335.  
  336.  
  337. -- part 28 (button)
  338. -- low flags: 00
  339. -- high flags: 2000
  340. -- rect: left=284 top=310 right=330 bottom=314
  341. -- title width / last selected line: 0
  342. -- icon id / first selected line: 25234 / 25234
  343. -- text alignment: 1
  344. -- font id: 0
  345. -- text size: 12
  346. -- style flags: 0
  347. -- line height: 16
  348. -- part name: rewind
  349. ----- HyperTalk script -----
  350. on mouseUp
  351.   visual wipe right slowly
  352.   go to last card
  353. end mouseUp
  354.  
  355.  
  356.  
  357. -- part 29 (button)
  358. -- low flags: 00
  359. -- high flags: 2000
  360. -- rect: left=425 top=291 right=313 bottom=455
  361. -- title width / last selected line: 0
  362. -- icon id / first selected line: 2167 / 2167
  363. -- text alignment: 1
  364. -- font id: 0
  365. -- text size: 12
  366. -- style flags: 0
  367. -- line height: 16
  368. -- part name: instruct
  369. ----- HyperTalk script -----
  370. on mouseUp
  371.   visual wipe left slowly
  372.   go to next card
  373. end mouseUp
  374.  
  375.  
  376.  
  377. -- part 32 (field)
  378. -- low flags: 00
  379. -- high flags: 0000
  380. -- rect: left=461 top=223 right=240 bottom=483
  381. -- title width / last selected line: 0
  382. -- icon id / first selected line: 0 / 0
  383. -- text alignment: 0
  384. -- font id: 2
  385. -- text size: 12
  386. -- style flags: 256
  387. -- line height: 16
  388. -- part name: 
  389.  
  390.  
  391. -- part 33 (button)
  392. -- low flags: 00
  393. -- high flags: 2000
  394. -- rect: left=31 top=280 right=292 bottom=259
  395. -- title width / last selected line: 0
  396. -- icon id / first selected line: 0 / 0
  397. -- text alignment: 1
  398. -- font id: 0
  399. -- text size: 12
  400. -- style flags: 0
  401. -- line height: 16
  402. -- part name: 
  403. ----- HyperTalk script -----
  404. on mouseUp
  405.   visual iris open very slowly
  406.   go to card "Adobe"
  407. end mouseUp
  408.  
  409.  
  410.  
  411. -- part 34 (button)
  412. -- low flags: 00
  413. -- high flags: 2000
  414. -- rect: left=258 top=224 right=239 bottom=491
  415. -- title width / last selected line: 0
  416. -- icon id / first selected line: 0 / 0
  417. -- text alignment: 1
  418. -- font id: 0
  419. -- text size: 12
  420. -- style flags: 0
  421. -- line height: 16
  422. -- part name: 
  423. ----- HyperTalk script -----
  424. on mouseUp
  425.   visual iris open very slowly
  426.   go to card "Disk"
  427. end mouseUp
  428.  
  429.  
  430.  
  431. -- part 35 (button)
  432. -- low flags: 00
  433. -- high flags: A000
  434. -- rect: left=390 top=117 right=176 bottom=490
  435. -- title width / last selected line: 0
  436. -- icon id / first selected line: 4212 / 4212
  437. -- text alignment: 1
  438. -- font id: 0
  439. -- text size: 12
  440. -- style flags: 0
  441. -- line height: 16
  442. -- part name: AMUG NEWS Dec '89
  443. ----- HyperTalk script -----
  444. on mouseUp
  445.   answer "Copy this button to your Home?" with "Yes" or "No"
  446.   if it is "No" then exit mouseUp
  447.   put userlevel into oldUser
  448.   put the short name of the target into Spot
  449.   put spot
  450.   push this card
  451.   set userlevel to 5
  452.  
  453.   put "on mouseUp" & return into myScript
  454.   put "go stack" && quote & Spot & quote & return after myScript
  455.   put "end mouseUp" after myScript
  456.  
  457.   select the target
  458.   doMenu "Copy Button"
  459.   visual Dissolve slowly
  460.   go to stack "Home"
  461.   doMenu "Paste Button"
  462.   show message box
  463.   put "Move the button to a good location"
  464.   wait until the mouse is down
  465.   set hilite of button Spot to true
  466.  
  467.   repeat until the mouse is up
  468.     set loc of button Spot to the mouseLoc
  469.   end repeat
  470.  
  471.   set hilite of button Spot to false
  472.  
  473.   hide message box
  474.   set userlevel to 5
  475.  
  476.   put oldUser into userlevel
  477.  
  478.   set the script of button Spot to myScript
  479.   choose Browse Tool
  480.   pop card
  481. end mouseUp
  482.  
  483.  
  484.  
  485.  
  486. -- part 36 (field)
  487. -- low flags: 00
  488. -- high flags: 0000
  489. -- rect: left=461 top=237 right=254 bottom=483
  490. -- title width / last selected line: 0
  491. -- icon id / first selected line: 0 / 0
  492. -- text alignment: 0
  493. -- font id: 2
  494. -- text size: 12
  495. -- style flags: 256
  496. -- line height: 16
  497. -- part name: 
  498.  
  499.  
  500. -- part 37 (button)
  501. -- low flags: 00
  502. -- high flags: 2000
  503. -- rect: left=258 top=238 right=253 bottom=491
  504. -- title width / last selected line: 0
  505. -- icon id / first selected line: 0 / 0
  506. -- text alignment: 1
  507. -- font id: 0
  508. -- text size: 12
  509. -- style flags: 0
  510. -- line height: 16
  511. -- part name: 
  512. ----- HyperTalk script -----
  513. on mouseUp
  514.   visual iris open very slowly
  515.   go to card "Library"
  516. end mouseUp
  517.  
  518.  
  519.  
  520. -- part 38 (button)
  521. -- low flags: 00
  522. -- high flags: 2000
  523. -- rect: left=1 top=30 right=109 bottom=506
  524. -- title width / last selected line: 0
  525. -- icon id / first selected line: 0 / 0
  526. -- text alignment: 1
  527. -- font id: 0
  528. -- text size: 12
  529. -- style flags: 0
  530. -- line height: 16
  531. -- part name: show
  532. ----- HyperTalk script -----
  533. on mouseUp
  534.   dispPICT "Comic1"
  535.   dispPICT "Comic2"
  536.   dispPICT "Comic3"
  537. end mouseUp
  538.  
  539.  
  540.  
  541. -- part contents for card part 4
  542. ----- text -----
  543. The PRESIDENT'S Desk...........
  544. The Editor's Zone....................
  545.  
  546.  
  547.  
  548.  
  549. -- part contents for card part 6
  550. ----- text -----
  551. 3
  552.  
  553.  
  554.  
  555. -- part contents for card part 7
  556. ----- text -----
  557. 8
  558.  
  559. -- part contents for card part 8
  560. ----- text -----
  561. REVIEWS
  562.  
  563. -- part contents for card part 9
  564. ----- text -----
  565. Why Renew? (an AMUG Review)......
  566. MacSprint II .........................................
  567. France tells U.S. not to get stuffed!....
  568. Adobe Type Manager...........................
  569.  
  570.  
  571. -- part contents for card part 11
  572. ----- text -----
  573. 10
  574.  
  575. -- part contents for card part 12
  576. ----- text -----
  577. 12
  578.  
  579. -- part contents for card part 14
  580. ----- text -----
  581. Departments
  582.  
  583. -- part contents for card part 13
  584. ----- text -----
  585. Disk by Mail............................................
  586. Library News .........................................
  587.  
  588.  
  589. -- part contents for card part 15
  590. ----- text -----
  591. 17
  592.  
  593. -- part contents for card part 16
  594. ----- text -----
  595. 24
  596.  
  597. -- part contents for card part 17
  598. ----- text -----
  599. 34
  600.  
  601. -- part contents for card part 30
  602. ----- text -----
  603. The AMUG Art Gallery...........................................
  604.  
  605. -- part contents for card part 32
  606. ----- text -----
  607. 31
  608.  
  609. -- part contents for card part 36
  610. ----- text -----
  611. 43